From a0d222a95f2d89197c611c555225abd2c06a5ab8 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Sat, 27 Mar 2004 00:06:30 +0000 Subject: [PATCH] (gnus-server-prepare): Remove spurious call to `cdr'. --- lisp/gnus/gnus-srvr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/gnus-srvr.el b/lisp/gnus/gnus-srvr.el index 31ad693a544..4015916a674 100644 --- a/lisp/gnus/gnus-srvr.el +++ b/lisp/gnus/gnus-srvr.el @@ -219,7 +219,7 @@ The following commands are available: (while alist (unless (member (cdar alist) done) (push (cdar alist) done) - (cdr (setq server (pop alist))) + (setq server (pop alist)) (when (and server (car server) (cdr server)) (gnus-server-insert-server-line (car server) (cdr server)))) (when (member (cdar alist) done) -- 2.30.2